home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / lisp / gcl-1.000 / gcl-1 / gcl-1.0 / mp / gcclab.awk < prev    next >
Encoding:
Text File  |  1991-02-06  |  213 b   |  13 lines
  1.  
  2.   /NEW_LABEL/ { lab++; next;}
  3.   /Lmylabel/  { at = index($0,"Lmylabel");
  4.               printf("%s%d%s\n", substr($0,1,at),lab,substr($0,at+1));
  5.               next;}
  6.  
  7.                 {print}
  8.  
  9.  
  10.  
  11.  
  12.               
  13.